home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / umich / utils / desktop / nodsk301.lzh / SCRIPTE / LZHSHOW.NDS < prev   
Text File  |  1994-12-19  |  944b  |  68 lines
  1. #
  2. #    Zielpfad und -datei suchen und erstellen
  3. #
  4.  
  5. echo@W1 " "
  6.  
  7. set path  = $2:t:r
  8. set path  = $TEMPDIR\$path
  9. set pnum  = 0
  10.  
  11. while (-e $path.$pnum)
  12.     set pnum @ $pnum + 1 
  13. wend
  14.  
  15. set path  = $path.$pnum
  16. set file  = $path\$3
  17.  
  18. mkdir $path
  19.  
  20. cd $path
  21.  
  22. #
  23. #    optionaler Bildertreiber
  24. #
  25.  
  26. set t = $3:r
  27.  
  28. if ("x"$3 != "x"$t) then
  29.     set otto = $3:e
  30.     set pdrv = $SYSDIR\$otto.NDT
  31.     if (! -e $pdrv)    unset pdrv
  32. endif
  33.  
  34. if ($?pdrv) then
  35.     echo@W1 "Bild "$3" extrahieren und anzeigen !"
  36. else
  37.     echo@W1 "Datei "$3" extrahieren und anzeigen !"
  38. endif
  39.  
  40. #
  41. #    Datei entarcen
  42. #
  43.  
  44. packerlzh@W1 x -pxm -w$path $2 $3 
  45.  
  46. sleep 1
  47.  
  48. #
  49. #    Terminalfenster schließen
  50. #
  51.  
  52. w_close -NWCON1
  53.  
  54.  
  55. #
  56. #    Bild-/Text-/Dump-Fenster öffnen
  57. #
  58.  
  59. if ($1 == 1) then
  60.     if ($?pdrv) then
  61.         wpic  -t$pdrv -P$wpicpos -X"rm -nRY $path" $file
  62.     else
  63.         wview -P$wtextpos -X"rm -nRY $path" $file
  64.     endif
  65. else
  66.     wdump -P$wtextpos -X"rm -nRY $path" $file
  67. endif
  68.